Public Class CHolidays

    Dim _intHolidayID As Integer
    Dim _strSeqHolidayID As String
    Dim _strDescription As String
    Dim _dtDate As Date

    Public Property SeqHolidayID() As String
        Get
            Return _strSeqHolidayID
        End Get
        Set(ByVal value As String)
            _strSeqHolidayID = value
        End Set
    End Property
    Public Property HolidayID() As Integer
        Get
            Return _intHolidayID
        End Get
        Set(ByVal value As Integer)
            _intHolidayID = value
        End Set
    End Property
    Public Property Description() As String
        Get
            Return _strDescription
        End Get
        Set(ByVal value As String)
            _strDescription = value
        End Set
    End Property
    Public Property DateOfHoliday() As Date
        Get
            Return _dtDate
        End Get
        Set(ByVal value As Date)
            _dtDate = value
        End Set
    End Property
End Class
